100 POKE53281,0:POKE53280,0:PRINT"[147][158]";
110 C$="12121515010115151212":CC=-1
111 SS$="                                        "
120 FORI=1TO12:PRINT"[169][169][169][169][169][169][169][169][169][169][169][169][169][169][169][169][169][169][169][169][155][223][223][223][223][223][223][223][223][223][223][223][223][223][223][223][223][223][223][223][223]";:NEXT
130 FORI=1TO12:PRINT"[152][223][223][223][223][223][223][223][223][223][223][223][223][223][223][223][223][223][223][223][223][151][169][169][169][169][169][169][169][169][169][169][169][169][169][169][169][169][169][169][169][169]";:NEXT
140 PRINT"[152][223][223][223][223][223][223][223][223][223][223][223][223][223][223][223][223][223][223][223][223][151][169][169][169][169][169][169][169][169][169][169][169][169][169][169][169][169][169][169][169]"
150 POKE2023,PEEK(1083):POKE56295,PEEK(56255)
160 FORI=217TO242:POKEI,PEEK(I)OR128:NEXT
170 POKE214,5:PRINT:FORI=1TO10:PRINTTAB(4)"[221][152]                              [146][158][221]"
180 NEXT:POKE214,6:POKE211,4:SYS58732
190 PRINT"[176][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][174]"
200 PRINTTAB(5)"[155][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][158]"
210 POKE214,16:POKE211,4:SYS58732
220 PRINT"[173][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][189]"
230 PRINTTAB(5)"[145][145][151][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][158]":POKE214,8:PRINT
240 A$="[201][160][206] [214] [207][160][201][160][195][160][197][160][160] [215][160][210][160][201][160][212] [197] [210]":GOSUB300
250 A$="BY [205]AURICE [210]ANDALL":GOSUB300
260 A$="[208][213][194][204][201][211][200][197][196][160][207][206][160][204][207][193][196][211][212][193][210][160]#66":GOSUB300
270 A$="[211][213][194][211][195][210][201][208][212][201][207][206][211] 1-800-831-2694":GOSUB300
280 A$="([195]) 1989 [205]AURICE [210]ANDALL":GOSUB300
290 GOTO310
300 PRINTSPC(20-LEN(A$)/2)"[152]"A$:RETURN
310 GOSUB510
330 POKE214,20:POKE211,4:SYS58732
340 PRINT"[159]1. [210][213][206] [201][206][214][207][201][195][197][160][215][210][201][212][197][210]
345 [153]"2. (null)(null)RIGHT$(null)(null)CLOSERIGHT$(null)(null)(null)RIGHT$LENVALCLOSE(null)(null)RIGHT$(null)VAL(null) (null)ATN(null)(null)ATN(null)
350 PRINT"3. [210][197][212][213][210][206][160][212][207][160][204][207][193][196][211][212][193][210]
370 [153]""
380 [161]A$:[139]A$[179]"1"[176]A$[177]"3"[167]380
381 C[178]1024[170](19[170][197](A$))[172]40[170]5:[129]I[178]C[164]C[170]30:[151]I,[194](I)[176]128:[130]
390 [145][197](A$)[137]400,410,420
400 F$[178]"INV.BOOT":[137]440
410 F$[178]"INV.MANUAL":[137]440
420 F$[178]"HELLO CONNECT"
440 [153]"";:[129]I[178]1[164]18:[153]SS$;:[130]
441 [129]I[178]217[164]242:[151]I,[194](I)[176]128:[130]
449 [159]15,8,15,"R0:"[170]F$[170]"="[170]F$:[132]15,ER:[160]15
450 [139]ER[179][177]63[167][128]
460 [153]"STOPLOAD"[199](34)F$[199](34)",8"
470 [151]631,13:[151]632,82:[151]633,213:[151]634,13:[151]198,4:[128]
510 [151]214,19:[158]58732:[129]I[178]1[164]5
520 [153]"OPEN                                      ":[130]:[153]"":[142]